#Load library
library(sparql)
#Query data
m <- query("SELECT ?date ?number ?season WHERE {  ?e <http://dbpedia.org/ontology/series>  <http://dbpedia.org/resource/The_Sopranos>  . ?e <http://dbpedia.org/ontology/releaseDate>    ?date . ?e <http://dbpedia.org/ontology/episodeNumber>  ?number . ?e <http://dbpedia.org/ontology/seasonNumber> ?season } LIMIT 10",
	"http://dbpedia.org/sparql")
#Print results
print(m)
